home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / g_quake / kuaqe2.zip / ENFORCER.QC < prev    next >
Text File  |  1996-10-06  |  12KB  |  370 lines
  1. /*
  2. ==============================================================================
  3.  
  4. SOLDIER / PLAYER
  5.  
  6. ==============================================================================
  7. */
  8.  
  9. $cd /raid/quake/id1/models/enforcer
  10. $origin 0 -6 24
  11. $base base        
  12. $skin skin
  13.  
  14. $frame stand1 stand2 stand3 stand4 stand5 stand6 stand7
  15.  
  16. $frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10
  17. $frame walk11 walk12 walk13 walk14 walk15 walk16
  18.  
  19. $frame run1 run2 run3 run4 run5 run6 run7 run8
  20.  
  21. $frame attack1 attack2 attack3 attack4 attack5 attack6
  22. $frame attack7 attack8 attack9 attack10
  23.  
  24. $frame death1 death2 death3 death4 death5 death6 death7 death8
  25. $frame death9 death10 death11 death12 death13 death14
  26.  
  27. $frame fdeath1 fdeath2 fdeath3 fdeath4 fdeath5 fdeath6 fdeath7 fdeath8
  28. $frame fdeath9 fdeath10 fdeath11
  29.  
  30. $frame paina1 paina2 paina3 paina4
  31.  
  32. $frame painb1 painb2 painb3 painb4 painb5
  33.  
  34. $frame painc1 painc2 painc3 painc4 painc5 painc6 painc7 painc8
  35.  
  36. $frame paind1 paind2 paind3 paind4 paind5 paind6 paind7 paind8
  37. $frame paind9 paind10 paind11 paind12 paind13 paind14 paind15 paind16
  38. $frame paind17 paind18 paind19
  39.  
  40.  
  41. void() Laser_Touch =
  42. {
  43.     local vector org;
  44.     
  45.     if (other == self.owner)
  46.         return;        // don't explode on owner
  47.  
  48.     if (pointcontents(self.origin) == CONTENT_SKY)
  49.     {
  50.         remove(self);
  51.         return;
  52.     }
  53.     
  54.     sound (self, CHAN_WEAPON, "enforcer/enfstop.wav", 1, ATTN_STATIC);
  55.     org = self.origin - 8*normalize(self.velocity);
  56.  
  57.     if (other.health)
  58.     {
  59.         SpawnBlood (org, self.velocity*0.2, 15);
  60.         T_Damage (other, self, self.owner, 15);
  61.     }
  62.     else
  63.     {
  64.         WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  65.         WriteByte (MSG_BROADCAST, TE_GUNSHOT);
  66.         WriteCoord (MSG_BROADCAST, org_x);
  67.         WriteCoord (MSG_BROADCAST, org_y);
  68.         WriteCoord (MSG_BROADCAST, org_z);
  69.     }
  70.     
  71.     remove(self);    
  72. };
  73.  
  74. void(vector org, vector vec) LaunchLaser =
  75. {
  76.     local    vector    vec;
  77.         
  78.     if (self.classname == "monster_enforcer")
  79.         sound (self, CHAN_WEAPON, "enforcer/enfire.wav", 1, ATTN_NORM);
  80.  
  81.     vec = normalize(vec);
  82.     
  83.     newmis = spawn();
  84.     newmis.owner = self;
  85.     newmis.movetype = MOVETYPE_FLY;
  86.     newmis.solid = SOLID_BBOX;
  87.     newmis.effects = EF_DIMLIGHT;
  88.  
  89.     setmodel (newmis, "progs/laser.mdl");
  90.     setsize (newmis, '0 0 0', '0 0 0');        
  91.  
  92.     setorigin (newmis, org);
  93.  
  94.     newmis.velocity = vec * 600;
  95.     newmis.angles = vectoangles(newmis.velocity);
  96.  
  97.     newmis.nextthink = time + 5;
  98.     newmis.think = SUB_Remove;
  99.     newmis.touch = Laser_Touch;
  100. };
  101.  
  102.  
  103.  
  104. void() enforcer_fire =
  105. {
  106.     local vector org;
  107.  
  108.     self.effects = self.effects | EF_MUZZLEFLASH;
  109.     makevectors (self.angles);
  110.     
  111.     org = self.origin + v_forward * 30 + v_right * 8.5 + '0 0 16';
  112.  
  113.     LaunchLaser(org, self.enemy.origin - self.origin);
  114. };
  115.  
  116. //============================================================================
  117.  
  118. void()    enf_stand1    =[    $stand1,    enf_stand2    ] {ai_stand();};
  119. void()    enf_stand2    =[    $stand2,    enf_stand3    ] {ai_stand();};
  120. void()    enf_stand3    =[    $stand3,    enf_stand4    ] {ai_stand();};
  121. void()    enf_stand4    =[    $stand4,    enf_stand5    ] {ai_stand();};
  122. void()    enf_stand5    =[    $stand5,    enf_stand6    ] {ai_stand();};
  123. void()    enf_stand6    =[    $stand6,    enf_stand7    ] {ai_stand();};
  124. void()    enf_stand7    =[    $stand7,    enf_stand1    ] {ai_stand();};
  125.  
  126. void()    enf_walk1    =[    $walk1 ,    enf_walk2    ] {
  127. if (random() < 0.2)
  128.     sound (self, CHAN_VOICE, "enforcer/idle1.wav", 1, ATTN_IDLE);
  129. ai_walk(2);};
  130. void()    enf_walk2    =[    $walk2 ,    enf_walk3    ] {ai_walk(4);};
  131. void()    enf_walk3    =[    $walk3 ,    enf_walk4    ] {ai_walk(4);};
  132. void()    enf_walk4    =[    $walk4 ,    enf_walk5    ] {ai_walk(3);};
  133. void()    enf_walk5    =[    $walk5 ,    enf_walk6    ] {ai_walk(1);};
  134. void()    enf_walk6    =[    $walk6 ,    enf_walk7    ] {ai_walk(2);};
  135. void()    enf_walk7    =[    $walk7 ,    enf_walk8    ] {ai_walk(2);};
  136. void()    enf_walk8    =[    $walk8 ,    enf_walk9    ] {ai_walk(1);};
  137. void()    enf_walk9    =[    $walk9 ,    enf_walk10    ] {ai_walk(2);};
  138. void()    enf_walk10    =[    $walk10,    enf_walk11    ] {ai_walk(4);};
  139. void()    enf_walk11    =[    $walk11,    enf_walk12    ] {ai_walk(4);};
  140. void()    enf_walk12    =[    $walk12,    enf_walk13    ] {ai_walk(1);};
  141. void()    enf_walk13    =[    $walk13,    enf_walk14    ] {ai_walk(2);};
  142. void()    enf_walk14    =[    $walk14,    enf_walk15    ] {ai_walk(3);};
  143. void()    enf_walk15    =[    $walk15,    enf_walk16    ] {ai_walk(4);};
  144. void()    enf_walk16    =[    $walk16,    enf_walk1    ] {ai_walk(2);};
  145.  
  146. void()    enf_run1    =[    $run1  ,    enf_run2    ] {
  147. if (random() < 0.2)
  148.     sound (self, CHAN_VOICE, "enforcer/idle1.wav", 1, ATTN_IDLE);
  149. ai_run(18);};
  150. void()    enf_run2    =[    $run2  ,    enf_run3    ] {ai_run(14);};
  151. void()    enf_run3    =[    $run3  ,    enf_run4    ] {ai_run(7);};
  152. void()    enf_run4    =[    $run4  ,    enf_run5    ] {ai_run(12);};
  153. void()    enf_run5    =[    $run5  ,    enf_run6    ] {ai_run(14);};
  154. void()    enf_run6    =[    $run6  ,    enf_run7    ] {ai_run(14);};
  155. void()    enf_run7    =[    $run7  ,    enf_run8    ] {ai_run(7);};
  156. void()    enf_run8    =[    $run8  ,    enf_run1    ] {ai_run(11);};
  157.  
  158. void()    enf_atk1    =[    $attack1,    enf_atk2    ] {ai_face();};
  159. void()    enf_atk2    =[    $attack2,    enf_atk3    ] {ai_face();};
  160. void()    enf_atk3    =[    $attack3,    enf_atk4    ] {ai_face();};
  161. void()    enf_atk4    =[    $attack4,    enf_atk5    ] {ai_face();};
  162. void()    enf_atk5    =[    $attack5,    enf_atk6    ] {ai_face();};
  163. void()    enf_atk6    =[    $attack6,    enf_atk7    ] {enforcer_fire();};
  164. void()    enf_atk7    =[    $attack7,    enf_atk8    ] {ai_face();};
  165. void()    enf_atk8    =[    $attack8,    enf_atk9    ] {ai_face();};
  166. void()    enf_atk9    =[    $attack5,    enf_atk10    ] {ai_face();};
  167. void()    enf_atk10    =[    $attack6,    enf_atk11    ] {enforcer_fire();};
  168. void()    enf_atk11    =[    $attack7,    enf_atk12    ] {ai_face();};
  169. void()    enf_atk12    =[    $attack8,    enf_atk13    ] {ai_face();};
  170. void()    enf_atk13    =[    $attack9,    enf_atk14    ] {ai_face();};
  171. void()    enf_atk14    =[    $attack10,    enf_run1    ] {ai_face();
  172. SUB_CheckRefire (enf_atk1);
  173. };
  174.  
  175. void()    enf_paina1    =[    $paina1,    enf_paina2    ] {};
  176. void()    enf_paina2    =[    $paina2,    enf_paina3    ] {};
  177. void()    enf_paina3    =[    $paina3,    enf_paina4    ] {};
  178. void()    enf_paina4    =[    $paina4,    enf_run1    ] {};
  179.  
  180. void()    enf_painb1    =[    $painb1,    enf_painb2    ] {};
  181. void()    enf_painb2    =[    $painb2,    enf_painb3    ] {};
  182. void()    enf_painb3    =[    $painb3,    enf_painb4    ] {};
  183. void()    enf_painb4    =[    $painb4,    enf_painb5    ] {};
  184. void()    enf_painb5    =[    $painb5,    enf_run1    ] {};
  185.  
  186. void()    enf_painc1    =[    $painc1,    enf_painc2    ] {};
  187. void()    enf_painc2    =[    $painc2,    enf_painc3    ] {};
  188. void()    enf_painc3    =[    $painc3,    enf_painc4    ] {};
  189. void()    enf_painc4    =[    $painc4,    enf_painc5    ] {};
  190. void()    enf_painc5    =[    $painc5,    enf_painc6    ] {};
  191. void()    enf_painc6    =[    $painc6,    enf_painc7    ] {};
  192. void()    enf_painc7    =[    $painc7,    enf_painc8    ] {};
  193. void()    enf_painc8    =[    $painc8,    enf_run1    ] {};
  194.  
  195. void()    enf_paind1    =[    $paind1,    enf_paind2    ] {};
  196. void()    enf_paind2    =[    $paind2,    enf_paind3    ] {};
  197. void()    enf_paind3    =[    $paind3,    enf_paind4    ] {};
  198. void()    enf_paind4    =[    $paind4,    enf_paind5    ] {ai_painforward(2);};
  199. void()    enf_paind5    =[    $paind5,    enf_paind6    ] {ai_painforward(1);};
  200. void()    enf_paind6    =[    $paind6,    enf_paind7    ] {};
  201. void()    enf_paind7    =[    $paind7,    enf_paind8    ] {};
  202. void()    enf_paind8    =[    $paind8,    enf_paind9    ] {};
  203. void()    enf_paind9    =[    $paind9,    enf_paind10    ] {};
  204. void()    enf_paind10    =[    $paind10,    enf_paind11    ] {};
  205. void()    enf_paind11    =[    $paind11,    enf_paind12    ] {ai_painforward(1);};
  206. void()    enf_paind12    =[    $paind12,    enf_paind13    ] {ai_painforward(1);};
  207. void()    enf_paind13    =[    $paind13,    enf_paind14    ] {ai_painforward(1);};
  208. void()    enf_paind14    =[    $paind14,    enf_paind15    ] {};
  209. void()    enf_paind15    =[    $paind15,    enf_paind16    ] {};
  210. void()    enf_paind16    =[    $paind16,    enf_paind17    ] {ai_pain(1);};
  211. void()    enf_paind17    =[    $paind17,    enf_paind18    ] {ai_pain(1);};
  212. void()    enf_paind18    =[    $paind18,    enf_paind19    ] {};
  213. void()    enf_paind19    =[    $paind19,    enf_run1    ] {};
  214.  
  215. void(entity attacker, float damage)    enf_pain =
  216. {
  217.     local float r;
  218.  
  219.     r = random ();
  220.     if (self.pain_finished > time)
  221.         return;
  222.  
  223.     
  224.     if (r < 0.5)
  225.         sound (self, CHAN_VOICE, "enforcer/pain1.wav", 1, ATTN_NORM);
  226.     else
  227.         sound (self, CHAN_VOICE, "enforcer/pain2.wav", 1, ATTN_NORM);
  228.  
  229.     if (r < 0.2)
  230.     {
  231.         self.pain_finished = time + 1;
  232.         enf_paina1 ();
  233.     }
  234.     else if (r < 0.4)
  235.     {
  236.         self.pain_finished = time + 1;
  237.         enf_painb1 ();
  238.     }
  239.     else if (r < 0.7)
  240.     {
  241.         self.pain_finished = time + 1;
  242.         enf_painc1 ();
  243.     }
  244.     else
  245.     {
  246.         self.pain_finished = time + 2;
  247.         enf_paind1 ();
  248.     }
  249. };
  250.  
  251. //============================================================================
  252.  
  253.  
  254.  
  255.  
  256. void()    enf_die1    =[    $death1,    enf_die2    ] {};
  257. void()    enf_die2    =[    $death2,    enf_die3    ] {};
  258. void()    enf_die3    =[    $death3,    enf_die4    ]
  259. {self.ammo_cells = 5;DropBackpack();};
  260. void()    enf_die4    =[    $death4,    enf_die5    ] {ai_forward(14);};
  261. void()    enf_die5    =[    $death5,    enf_die6    ] {ai_forward(2);};
  262. void()    enf_die6    =[    $death6,    enf_die7    ] {};
  263. void()    enf_die7    =[    $death7,    enf_die8    ] {};
  264. void()    enf_die8    =[    $death8,    enf_die9    ] {};
  265. void()    enf_die9    =[    $death9,    enf_die10    ] {ai_forward(3);};
  266. void()    enf_die10    =[    $death10,    enf_die11    ] {ai_forward(5);};
  267. void()    enf_die11    =[    $death11,    enf_die12    ] {ai_forward(5);};
  268. void()    enf_die12    =[    $death12,    enf_die13    ] {ai_forward(5);};
  269. void()    enf_die13    =[    $death13,    enf_die14    ] {};
  270. void()    enf_die14    =[    $death14,    enf_die14    ] {};
  271.  
  272. void()    enf_fdie1    =[    $fdeath1,    enf_fdie2    ] {
  273.  
  274. };
  275. void()    enf_fdie2    =[    $fdeath2,    enf_fdie3    ] {};
  276. void()    enf_fdie3    =[    $fdeath3,    enf_fdie4    ] 
  277. {self.ammo_cells = 5;DropBackpack();};
  278. void()    enf_fdie4    =[    $fdeath4,    enf_fdie5    ] {};
  279. void()    enf_fdie5    =[    $fdeath5,    enf_fdie6    ] {};
  280. void()    enf_fdie6    =[    $fdeath6,    enf_fdie7    ] {};
  281. void()    enf_fdie7    =[    $fdeath7,    enf_fdie8    ] {};
  282. void()    enf_fdie8    =[    $fdeath8,    enf_fdie9    ] {};
  283. void()    enf_fdie9    =[    $fdeath9,    enf_fdie10    ] {};
  284. void()    enf_fdie10    =[    $fdeath10,    enf_fdie11    ] {};
  285. void()    enf_fdie11    =[    $fdeath11,    enf_fdie11    ] {};
  286.  
  287. void() enf_really_die =
  288. {
  289.     if(self.flags & FL_MONSTER)
  290.         sound (self, CHAN_VOICE, "player/udeath.wav", 1, ATTN_NORM);
  291.     ThrowHead ("progs/h_mega.mdl", self.health);
  292.         ThrowGib ("progs/gib3.mdl", self.health);
  293.     ThrowGib ("progs/gib2.mdl", self.health);
  294.     ThrowGib ("progs/gib3.mdl", self.health);
  295. };
  296.  
  297. void() enf_die =
  298. {
  299. // check for gib
  300.     if (self.health < -35)
  301.     {
  302.         enf_really_die();
  303.         return;
  304.     }
  305.  
  306. // regular death
  307.     sound (self, CHAN_VOICE, "enforcer/death1.wav", 1, ATTN_NORM);
  308.     if (random() > 0.5)
  309.         enf_die1 ();
  310.     else
  311.         enf_fdie1 ();
  312.  
  313.         self.health=1;
  314.         setsize (self, '0 0 -24', '0 0 -24');
  315.     self.th_stand = SUB_Null;
  316.     self.th_walk = SUB_Null;
  317.     self.th_run = SUB_Null;
  318.         self.th_pain = SUB_Null;
  319.     self.th_die = enf_really_die;
  320.     self.th_melee = SUB_Null;
  321.     self.th_missile = SUB_Null;
  322.     self.takedamage= DAMAGE_YES; // DAMAGE_AIM ?
  323.         self.flags = self.flags - FL_MONSTER;
  324.         self.onfire = 0;
  325. };
  326.  
  327.  
  328. /*QUAKED monster_enforcer (1 0 0) (-16 -16 -24) (16 16 40) Ambush
  329.  
  330. */
  331. void() monster_enforcer =
  332. {
  333.     if (deathmatch)
  334.     {
  335.         remove(self);
  336.         return;
  337.     }
  338.     precache_model2 ("progs/enforcer.mdl");
  339.     precache_model2 ("progs/h_mega.mdl");
  340.     precache_model2 ("progs/laser.mdl");
  341.  
  342.     precache_sound2 ("enforcer/death1.wav");
  343.     precache_sound2 ("enforcer/enfire.wav");
  344.     precache_sound2 ("enforcer/enfstop.wav");
  345.     precache_sound2 ("enforcer/idle1.wav");
  346.     precache_sound2 ("enforcer/pain1.wav");
  347.     precache_sound2 ("enforcer/pain2.wav");
  348.     precache_sound2 ("enforcer/sight1.wav");
  349.     precache_sound2 ("enforcer/sight2.wav");
  350.     precache_sound2 ("enforcer/sight3.wav");
  351.     precache_sound2 ("enforcer/sight4.wav");
  352.     
  353.     self.solid = SOLID_SLIDEBOX;
  354.     self.movetype = MOVETYPE_STEP;
  355.  
  356.     setmodel (self, "progs/enforcer.mdl");
  357.  
  358.     setsize (self, '-16 -16 -24', '16 16 40');
  359.     self.health = 30;
  360.  
  361.     self.th_stand = enf_stand1;
  362.     self.th_walk = enf_walk1;
  363.     self.th_run = enf_run1;
  364.     self.th_pain = enf_pain;
  365.     self.th_die = enf_die;
  366.     self.th_missile = enf_atk1;
  367.  
  368.     walkmonster_start();
  369. };
  370.